DEFINITION MODULE DeskMgr;   (* Christoph Fleischer 07.02.85 *)
                             (* MacIntosh Toolbox Desk Manager Routines *)
                             (* last modification   27.07.85 fxk*)

FROM MacBase IMPORT StrPtr,LongInt;
FROM EventMgr IMPORT EventRecord;
FROM WindowMgr IMPORT WindowPtr;

EXPORT QUALIFIED
  cutCmd,copyCmd,pasteCmd,undoCmd,clearCmd,
  SystemEvent,SystemClick,SystemTask,SystemMenu,SystemEdit,OpenDeskAcc,CloseDeskAcc;


CONST
  cutCmd    =  0;
  copyCmd   =  1;
  pasteCmd  =  2;
  undoCmd   =  3;
  clearCmd  =  4;


PROCEDURE SystemEvent(myEvent: EventRecord): BOOLEAN;                 (*INLINE $A9B2*)
PROCEDURE SystemClick(theEvent: EventRecord; theWindow: WindowPtr);   (*INLINE $A9B3*)
PROCEDURE SystemTask;                                                 (*INLINE $A9B4*)
PROCEDURE SystemMenu(menuResult: LongInt);                            (*INLINE $A9B5*)
PROCEDURE SystemEdit(editCode: INTEGER): BOOLEAN;                     (*INLINE $A9C2*)
PROCEDURE OpenDeskAcc(theAcc: StrPtr): INTEGER;                       (*INLINE $A9B6*)
PROCEDURE CloseDeskAcc(refNum: INTEGER);                              (*INLINE $A9B7*)

END DeskMgr.
